home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet internetowy / Rozne / HTTrack 3.40-2 / httrack-3.40-2.exe / {app} / src_win / WinHTTrack / HTTrackInterface.c < prev    next >
C/C++ Source or Header  |  2005-08-28  |  7KB  |  289 lines
  1. /* ------------------------------------------------------------ */
  2. /*
  3. HTTrack Website Copier, Offline Browser for Windows and Unix
  4. Copyright (C) Xavier Roche and other contributors
  5.  
  6. This program is free software; you can redistribute it and/or
  7. modify it under the terms of the GNU General Public License
  8. as published by the Free Software Foundation; either version 2
  9. of the License, or any later version.
  10.  
  11. This program is distributed in the hope that it will be useful,
  12. but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14. GNU General Public License for more details.
  15.  
  16. You should have received a copy of the GNU General Public License
  17. along with this program; if not, write to the Free Software
  18. Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  19.  
  20.  
  21. Important notes:
  22.  
  23. - We hereby ask people using this source NOT to use it in purpose of grabbing
  24. emails addresses, or collecting any other private information on persons.
  25. This would disgrace our work, and spoil the many hours we spent on it.
  26.  
  27.  
  28. Please visit our Website: http://www.httrack.com
  29. */
  30.  
  31.  
  32. /* ------------------------------------------------------------ */
  33. /* File: Interface                                              */
  34. /* Author: Xavier Roche                                         */
  35. /* ------------------------------------------------------------ */
  36.  
  37. #include <sys/types.h>
  38. #include <sys/stat.h>
  39.  
  40. #include "htsglobal.h"
  41. #include "htsbase.h"
  42.  
  43. #include "HTTrackInterface.h"
  44.  
  45. // Lecture d'une ligne (peut Ωtre unicode α priori)
  46. int linput(FILE* fp,char* s,int max) {
  47.   int c;
  48.   int j=0;
  49.   do {
  50.     c=fgetc(fp);
  51.     if (c!=EOF) {
  52.       switch(c) {
  53.         case 13: break;  // sauter CR
  54.         case 10: c=-1; break;
  55.         case 9: case 12: break;  // sauter ces caractΦres
  56.         default: s[j++]=(char) c; break;
  57.       }
  58.     }
  59.   }  while((c!=-1) && (c!=EOF) && (j<(max-1)));
  60.   s[j]='\0';
  61.   return j;
  62. }
  63. int linput_trim(FILE* fp,char* s,int max) {
  64.   int rlen=0;
  65.   char* ls=(char*) malloct(max+2);
  66.   s[0]='\0';
  67.   if (ls) {
  68.     char* a;
  69.     // lire ligne
  70.     rlen=linput(fp,ls,max);
  71.     if (rlen) {
  72.       // sauter espaces et tabs en fin
  73.       while( (rlen>0) && ((ls[max(rlen-1,0)]==' ') || (ls[max(rlen-1,0)]=='\t')) )
  74.         ls[--rlen]='\0';
  75.       // sauter espaces en dΘbut
  76.       a=ls;
  77.       while((rlen>0) && ((*a==' ') || (*a=='\t'))) {
  78.         a++;
  79.         rlen--;
  80.       }
  81.       if (rlen>0) {
  82.         memcpy(s,a,rlen);      // can copy \0 chars
  83.         s[rlen]='\0';
  84.       }
  85.     }
  86.     //
  87.     freet(ls);
  88.   }
  89.   return rlen;
  90. }
  91. int linput_cpp(FILE* fp,char* s,int max) {
  92.   int rlen=0;
  93.   s[0]='\0';
  94.   do {
  95.     int ret;
  96.     if (rlen>0)
  97.     if (s[rlen-1]=='\\')
  98.       s[--rlen]='\0';      // couper \ final
  99.     // lire ligne
  100.     ret=linput_trim(fp,s+rlen,max-rlen);
  101.     if (ret>0)
  102.       rlen+=ret;
  103.   } while((s[max(rlen-1,0)]=='\\') && (rlen<max));
  104.   return rlen;
  105. }
  106.  
  107. // idem avec les car spΘciaux
  108. void rawlinput(FILE* fp,char* s,int max) {
  109.   int c;
  110.   int j=0;
  111.   do {
  112.     c=fgetc(fp);
  113.     if (c!=EOF) {
  114.       switch(c) {
  115.         case 13: break;  // sauter CR
  116.         case 10: c=-1; break;
  117.         default: s[j++]=(char) c; break;
  118.       }
  119.     }
  120.   }  while((c!=-1) && (c!=EOF) && (j<(max-1)));
  121.   s[j++]='\0';
  122. }
  123.  
  124. // Like linput, but in memory (optimized)
  125. int binput(char* buff,char* s,int max) {
  126.   int count = 0;
  127.   int destCount = 0;
  128.  
  129.   // Note: \0 will return 1
  130.   while(destCount < max && buff[count] != '\0' && buff[count] != '\n') {
  131.     if (buff[count] != '\r') {
  132.       s[destCount++] = buff[count];
  133.     }
  134.         count++;
  135.   }
  136.   s[destCount] = '\0';
  137.  
  138.   // then return the supplemental jump offset
  139.   return count + 1;
  140. } 
  141.  
  142. int fexist(char* s) {
  143.   struct stat st;
  144.   memset(&st, 0, sizeof(st));
  145.   if (stat(s, &st) == 0) {
  146.     if (S_ISREG(st.st_mode)) {
  147.       return 1;
  148.     }
  149.   }
  150.   return 0;
  151. } 
  152.  
  153. INTsys fsize(char* s) {
  154.   FILE* fp;
  155.   fp=fopen(s,"rb");
  156.   if (fp!=NULL) {
  157.     INTsys i;
  158.     fseek(fp,0,SEEK_END);
  159.     i=ftell(fp);
  160.     fclose(fp);
  161.     return i;
  162.   } else return -1;
  163. }
  164.  
  165. TStamp time_local(void) {
  166.   return ((TStamp) time(NULL));
  167. }
  168.  
  169.  
  170.  
  171.  
  172.  
  173. #define NOSTATIC_RESERVE(name, type, nelt) NOSTATIC_XRESERVE(name, type, nelt)
  174. #define NOSTATIC_XRESERVE(name, type, nelt) do { \
  175.   __declspec( thread ) static type thValue[nelt]; \
  176.   __declspec( thread ) int  static initValue = 0; \
  177.   name = thValue; \
  178.   if (!initValue) { \
  179.     initValue = 1; \
  180.     memset(&thValue, 0, sizeof(thValue)); \
  181.   } \
  182. } while(0)
  183.  
  184.  
  185.  
  186. typedef struct concat_strc {
  187.   char buff[16][HTS_URLMAXSIZE*2*2];
  188.   int rol;
  189. } concat_strc;
  190. char* concat(const char* a,const char* b) {
  191.   concat_strc* strc;
  192.   NOSTATIC_RESERVE(strc, concat_strc, 1);
  193.   strc->rol=((strc->rol+1)%16);    // roving pointer
  194.   strcpybuff(strc->buff[strc->rol],a);
  195.   if (b) strcatbuff(strc->buff[strc->rol],b);
  196.   return strc->buff[strc->rol];
  197. }
  198. // conversion fichier / -> antislash
  199. #if HTS_DOSNAME
  200. char* __fconv(char* a) {
  201.   int i;
  202.   for(i=0;i<(int) strlen(a);i++)
  203.     if (a[i]=='/')  // convertir
  204.       a[i]='\\';
  205.   return a;
  206. }
  207. char* fconcat(char* a,char* b) {
  208.   return __fconv(concat(a,b));
  209. }
  210. char* fconv(char* a) {
  211.   return __fconv(concat(a,""));
  212. }
  213. #endif
  214.  
  215. /* / et \\ en / */
  216. char* __fslash(char* a) {
  217.   int i;
  218.   for(i=0;i<(int) strlen(a);i++)
  219.     if (a[i]=='\\')  // convertir
  220.       a[i]='/';
  221.   return a;
  222. }
  223. char* fslash(char* a) {
  224.   return __fslash(concat(a,""));
  225. }
  226.  
  227. // conversion minuscules, avec buffer
  228. char* convtolower(char* a) {
  229.   concat_strc* strc;
  230.   NOSTATIC_RESERVE(strc, concat_strc, 1);
  231.   strc->rol=((strc->rol+1)%16);    // roving pointer
  232.   strcpybuff(strc->buff[strc->rol],a);
  233.   hts_lowcase(strc->buff[strc->rol]);  // lower case
  234.   return strc->buff[strc->rol];
  235. }
  236.  
  237. // conversion en minuscules
  238. void hts_lowcase(char* s) {
  239.   int i;
  240.   for(i=0;i<(int) strlen(s);i++)
  241.     if ((s[i]>='A') && (s[i]<='Z'))
  242.       s[i]+=('a'-'A');
  243. }
  244.  
  245. char* next_token(char* p,int flag) {
  246.   int detect=0;
  247.   int quote=0;
  248.   p--;
  249.   do {
  250.     p++;
  251.     if (flag && (*p=='\\')) {   // sauter \x ou \"
  252.       if (quote) {
  253.         char c='\0';
  254.         if (*(p+1)=='\\')
  255.           c='\\';
  256.         else if (*(p+1)=='"')
  257.           c='"';
  258.         if (c) {
  259.           char* tempo = malloc(strlen(p) + 2 + 2);
  260.           tempo[0]=c; tempo[1]='\0';
  261.           strcatbuff(tempo,p+2);
  262.           strcpybuff(p,tempo);
  263.           free(tempo);
  264.         }
  265.       }
  266.     }
  267.     else if (*p==34) {  // guillemets (de fin)
  268.       char* tempo = malloc(strlen(p) + 2);
  269.       tempo[0]='\0';
  270.       strcatbuff(tempo,p+1);
  271.       strcpybuff(p,tempo);   /* wipe "" */
  272.       p--;
  273.       /* */
  274.       quote=!quote;
  275.       /* */
  276.       free(tempo);
  277.     }
  278.     else if (*p==32) {
  279.       if (!quote)
  280.         detect=1;
  281.     }
  282.     else if (*p=='\0') {
  283.       p=NULL;
  284.       detect=1;
  285.     }
  286.   } while(!detect);
  287.   return p;
  288. }
  289.